home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_inf_fadetester.cog < prev    next >
Text File  |  1999-11-15  |  1KB  |  53 lines
  1. # Jones 3D Cog Script
  2. #
  3. # INF_FlyingRobot.cog
  4. # Controls the robot sector thing
  5. #
  6. # [SXC]
  7. #
  8. # (C) 1998 LucasArts Entertainment Co. All Rights Reserved
  9. # ========================================================================================
  10.  
  11. symbols
  12.  
  13.     message     startup
  14.     surface     aethadjoin0
  15.     surface     aethadjoin1
  16.     int         x                                           local
  17.     int         y                                           local
  18.     int         foo=1                                       local
  19.       
  20. end
  21.  
  22.  
  23. code
  24. startup:
  25.  
  26.  
  27. Sleep(1);    
  28. While(foo == 1)
  29. {
  30.     //fade the aeth sector out
  31.     for(x=254; x>=0; x=x-20)
  32.     {
  33.         SetAdjoinAlpha(aethadjoin0, x);
  34.         SetAdjoinAlpha(aethadjoin1, x);
  35.         Sleep(0.01);
  36.     }
  37.     
  38.     for(x=0; x<=254; x=x+20)
  39.     {
  40.         SetAdjoinAlpha(aethadjoin0, x);
  41.         SetAdjoinAlpha(aethadjoin1, x);
  42.         Sleep(0.01);
  43.     }
  44.     
  45. }
  46.     return;
  47.  
  48. #........................................................................................
  49.  
  50. end
  51.  
  52.  
  53.